Inference at * 
Iof proof for Lemma add functionality wrt eq:


  i1, i2, j1, j2:. (i1 = j1)  (i2 = j2)  (i1+i2 = j1+j2) 

latex

 by (Auto_aux (first_nat 1:n) ((first_nat 2:n),(first_nat 3:n)) (first_tok :t) inil_term) 

latex

 .

Definitions

, t  T, P  Q, x:A. B(x)